package top.eggcode.common.file;

import lombok.extern.slf4j.Slf4j;
import org.apache.commons.lang.StringUtils;
import top.eggcode.common.error.ApplicationException;

import java.io.*;
import java.util.Objects;
import java.util.zip.ZipEntry;
import java.util.zip.ZipOutputStream;

/**
 * 文件压缩
 * Created at 20:45 2020/11/6
 *
 * @author DingJiaQi
 */
@Slf4j
public class FileCompressUtil {
    // 文件处理-缓存区大小: 2MB
    private static final int BUFFER_SIZE = 1024 * 2;

    /**
     * 文件保存到本地
     *
     * @param srcIn      资源读取流
     * @param targetPath 输出路径
     */
    public static void saveToLocal(InputStream srcIn, String targetPath) {
        if (srcIn != null && !StringUtils.isBlank(targetPath)) {
            byte[] buffer = new byte[BUFFER_SIZE];
            try (
                    OutputStream targetOut = new FileOutputStream(targetPath)
            ) {
                // 数据长度记录
                int scaleplate = 0;
                while ((scaleplate = srcIn.read(buffer)) != -1) {
                    targetOut.write(buffer, 0, scaleplate);
                }
            } catch (IOException e) {
                throw new ApplicationException("> 文件保存失败");
            }
        }
    }

    /**
     * 文件保存到本地
     *
     * @param srcIn     资源读取路径
     * @param targetOut 输出流
     */
    public static void saveToLocal(InputStream srcIn, OutputStream targetOut) {
        if (srcIn != null && targetOut != null) {
            byte[] buffer = new byte[BUFFER_SIZE];
            try {
                // 数据长度记录
                int scaleplate = 0;
                while ((scaleplate = srcIn.read(buffer)) != -1) {
                    targetOut.write(buffer, 0, scaleplate);
                }
            } catch (IOException e) {
                throw new ApplicationException("> 文件IO异常");
            }
        }
    }

    /**
     * 将文件输出到流
     *
     * @param srcIn     输入流
     * @param targetOut 输出流
     */
    public static void fileToOut(InputStream srcIn, OutputStream targetOut) throws IOException {
        if (srcIn != null && targetOut != null) {
            byte[] buffer = new byte[BUFFER_SIZE];
            // 数据长度记录
            int scaleplate = 0;
            while ((scaleplate = srcIn.read(buffer)) != -1) {
                targetOut.write(buffer, 0, scaleplate);
            }
        }
    }

    /**
     * 清空文件夹(不涉及子文件夹)
     *
     * @param dirPath 文件夹路径
     */
    public static void emptyDir(String dirPath) {
        File srcDir = new File(dirPath);
        if (srcDir.isDirectory()) {
            File[] fileList = srcDir.listFiles();
            if (fileList != null) {
                for (File srcFile : fileList) {
                    if (!srcFile.delete()) {
                        throw new ApplicationException("> 删除失败, 文件可能不存在");
                    }
                }
            }

        }
    }

    /**
     * 删除文件夹及其文件(不涉及子文件夹)
     *
     * @param dirPath 文件夹路径
     */
    public static void delDir(String dirPath) {
        File srcDir = new File(dirPath);
        if (srcDir.isDirectory()) {
            File[] fileList = srcDir.listFiles();
            if (fileList != null) {
                for (File srcFile : fileList) {
                    if (!srcFile.delete()) {
                        throw new ApplicationException("> 删除失败, 文件可能不存在");
                    }
                }
                srcDir.delete();

            }

        }
    }

    /**
     * 删除文件夹及其文件(不涉及子文件夹)
     *
     * @param dirPath 文件夹路径
     */
    public static void delAll(String dirPath) {
        delDirRecursively(new File(dirPath));
    }

    /**
     * 递归地删除文件夹
     *
     * @param srcFile 资源文件/文件夹对象
     */
    public static void delDirRecursively(File srcFile) {
        // 存在
        if (srcFile.exists()) {
            // 是文件
            if (srcFile.isFile()) {
                srcFile.delete();
            } else if (srcFile.isDirectory()) {
                // 是文件夹
                for (File file : Objects.requireNonNull(srcFile.listFiles(), "文件夹为空")) {
                    delDirRecursively(file);
                }
                // 删除文件夹
                srcFile.delete();
            }
        }
    }

    /**
     * 核实目录, 不存在就创建
     *
     * @param dirPath 文件夹路径
     */
    public static void verifyDir(String dirPath) {
        File dir = new File(dirPath);
        if (!dir.exists()) {
            if (!dir.mkdirs()) {
                throw new ApplicationException("> 文件创建失败");
            }
        }
    }

    /**
     * 递归地清空文件夹
     *
     * @param srcFile 资源文件夹对象
     */
    public static void emptyDirRecursively(File srcFile) {
        // 存在
        if (srcFile.exists()) {
            // 是文件
            if (srcFile.isFile()) {
                srcFile.delete();
            } else if (srcFile.isDirectory()) {
                // 是文件夹

                for (File file : Objects.requireNonNull(srcFile.listFiles(), "文件夹为空")) {
                    emptyDirRecursively(file);
                }
            }
        }
    }

    /**
     * 删除文件
     *
     * @param srcPath 资源文件对象
     */
    public static void del(String srcPath) {
        File srcFile = new File(srcPath);
        if (!srcFile.delete()) {
            throw new ApplicationException("> 删除失败, 文件可能不存在");
        }
    }

    /**
     * 压缩目录中的所有文件
     *
     * @param srcDirPath 资源文件夹路径
     * @param zipPath    文件夹压缩路径
     */
    public static void compressFilesInDir(String srcDirPath, String zipPath) {
        File srcDir = new File(srcDirPath);

        if (srcDir.isDirectory()) {
            try (
                    ZipOutputStream zipOut = new ZipOutputStream(
                            new FileOutputStream(zipPath)
                    )
            ) {
                byte[] buffer = new byte[BUFFER_SIZE];
                File[] fileList = srcDir.listFiles();
                for (File srcFile : Objects.requireNonNull(fileList)) {
                    try (
                            InputStream srcIn = new FileInputStream(srcFile)
                    ) {
                        zipOut.putNextEntry(
                                new ZipEntry(srcFile.getName())
                        );
                        // 数据长度记录
                        int scaleplate = 0;
                        while ((scaleplate = srcIn.read(buffer)) != -1) {
                            zipOut.write(buffer, 0, scaleplate);
                        }
                    } catch (IOException e) {
                        e.printStackTrace();
                    }
                }
            } catch (IOException e) {
                e.printStackTrace();
            }

        }
    }

    /**
     * 压缩成ZIP保存到指定目录
     *
     * @param srcPath          源文件路径
     * @param zipPath          压缩后文件路径
     * @param keepDirStructure true 保留原目录结构 false 不保留原目录结构
     * @throws FileNotFoundException 文件找不到异常
     */
    public static void toZip(String srcPath, String zipPath, boolean keepDirStructure) throws IOException {
        try (FileOutputStream out = new FileOutputStream(new File(zipPath))) {
            FileCompressUtil.toZip(srcPath, out, keepDirStructure);
        }
    }

    /**
     * 压缩成ZIP
     *
     * @param srcDir           压缩文件夹路径
     * @param out              压缩文件输出流
     * @param keepDirStructure 是否保留原来的目录结构,true:保留目录结构;
     *                         false:所有文件跑到压缩包根目录下(注意：不保留目录结构可能会出现同名文件,会压缩失败)
     * @throws RuntimeException 压缩失败会抛出运行时异常
     */
    public static void toZip(String srcDir, OutputStream out, boolean keepDirStructure)
            throws RuntimeException {
        long start = System.currentTimeMillis();
        ZipOutputStream zos = null;
        try {
            zos = new ZipOutputStream(out);
            File sourceFile = new File(srcDir);
            compress(sourceFile, zos, sourceFile.getName(), keepDirStructure);
            long end = System.currentTimeMillis();
            log.info("压缩完成，耗时：" + (end - start) + " ms");
        } catch (Exception e) {
            throw new RuntimeException("zip error from ZipUtils", e);
        } finally {
            if (zos != null) {
                try {
                    zos.close();
                } catch (IOException e) {
                    e.printStackTrace();
                }
            }
        }
    }

    /**
     * 递归压缩方法
     *
     * @param sourceFile       源文件
     * @param zos              zip输出流
     * @param name             压缩后的名称
     * @param keepDirStructure 是否保留原来的目录结构,true:保留目录结构;
     *                         false:所有文件跑到压缩包根目录下(注意：不保留目录结构可能会出现同名文件,会压缩失败)
     * @throws Exception
     */
    private static void compress(File sourceFile, ZipOutputStream zos, String name,
                                 boolean keepDirStructure) throws Exception {
        byte[] buf = new byte[BUFFER_SIZE];
        if (sourceFile.isFile()) {
            // 向zip输出流中添加一个zip实体，构造器中name为zip实体的文件的名字
            zos.putNextEntry(new ZipEntry(name));
            // copy文件到zip输出流中
            int len;
            FileInputStream in = new FileInputStream(sourceFile);
            while ((len = in.read(buf)) != -1) {
                zos.write(buf, 0, len);
            }
            zos.closeEntry();
            in.close();
        } else {
            File[] listFiles = sourceFile.listFiles();
            if (listFiles == null || listFiles.length == 0) {
                // 需要保留原来的文件结构时,需要对空文件夹进行处理
                if (keepDirStructure) {
                    // 空文件夹的处理
                    zos.putNextEntry(new ZipEntry(name + "/"));
                    // 没有文件，不需要文件的copy
                    zos.closeEntry();
                }

            } else {
                for (File file : listFiles) {
                    // 判断是否需要保留原来的文件结构
                    if (keepDirStructure) {
                        // 注意：file.getName()前面需要带上父文件夹的名字加一斜杠,
                        // 不然最后压缩包中就不能保留原来的文件结构,即：所有文件都跑到压缩包根目录下了
                        compress(file, zos, name + "/" + file.getName(), true);
                    } else {
                        compress(file, zos, file.getName(), false);
                    }

                }
            }
        }
    }

    /**
     * 压缩单个文件
     *
     * @param srcFilePath 源文件路径
     * @param zipPath     压缩包路径(压缩包可以包含多个压缩过的文件)
     */
    public static void compressFile(String srcFilePath, String zipPath, boolean del) {
        File srcFile = new File(srcFilePath);
        byte[] buffer = new byte[BUFFER_SIZE];
        try (
                // 源文件读入
                InputStream srcIn = new FileInputStream(srcFilePath);
                // 压缩包输出
                ZipOutputStream zipOut = new ZipOutputStream(
                        new FileOutputStream(zipPath)
                )
        ) {
            // 向压缩包添加压缩文件
            zipOut.putNextEntry(new ZipEntry(srcFile.getName()));
            // 数据长度记录
            int scaleplate = 0;
            while ((scaleplate = srcIn.read(buffer)) != -1) {
                zipOut.write(buffer, 0, scaleplate);
            }
        } catch (IOException e) {
            throw new ApplicationException("> 文件压缩失败");
        }
    }


    /**
     * 删除文件
     *
     * @param filePath 文件路径
     */
    public static void deleteFile(String filePath) {
        if (filePath != null && !"".equals(filePath)) {
            File target = new File(filePath);
            if (target.exists()) {
                if (!target.delete()) {
                    throw new ApplicationException("文件删除失败，path： " + filePath);
                }
            }
        }

    }


}
